63990 POKE828,169:POKE829,0:POKE830,76
63991 POKE831,49:POKE832,243:CLOSE4
63992 INPUT"FILENAME";F$:OPEN4,8,4,F$:GET#4,A$,A$:POKE829,1:A$=""
63993 PRINT"[147]POKE812,60:POKE813,3":IFA$>""THEN63995
63994 GET#4,A$
63995 PRINTA$;:IFA$<>CHR$(13)THEN63994
63996 GET#4,A$:A=0:IFST=0THENA=ASC(A$+CHR$(0))
63997 PRINT"A$=CHR$("A"):GOTO63993
63998 [139]ST[167][151]829,0:[160]4:[144]
63999 [151]198,3:[151]631,13:[151]632,13:[151]633,13:[153]"":[128]